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MEETING 
The FEBRUARY meeting will be: 


on: FRI., FEBRUARY 10, 1989 

meeting room open at: 

in: COMMUNITY ROOM 
FAR WEST FEDERAL S & L 


OREGON CITY SHOPPING CENTER 
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7:00 P.M. 
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CONPUTING THE FUTU 
IN CLACKAMAS COUNT 


SON P BOX 


I would like to thank all of our 
*"nard-core” members for their 
continued support of CCAT/S and 
their devotion to our beloved 
Timex/Sinclair computers. We have 
faired far better than tany T/S 
users and user groups. It is 
heartening tn see the solid 
attendance and support our gqroup 
continues to receive from our 
membership. One of the major 
reasons we are a such strong user 
group, is the support we Qive each 
otner by sharing our enthusiasm for 
and experiences with our T/5 
computers. To kelp insure a strong 
future for cur group, we need to 
extend our helping hands to our 
newer mempers and “guests”. It has 
Deen SO rare recentiy te see new 
faces amongst our midsts that we 
sometimes tend to eave our new 
visitors and members out of our 
"family circle”. i know this is not 
intentional, but we must make every 
effort to make our new T/S users 
teel comfortable and at home. We 
need to take a +tew minutes anda 
reflect on where we were six or 
seven years ago tyes, it has been at 
isast that lany for some of us) and 
use our experience to help our new 
users, not overwheim: them. 
>> >> > 
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A reminder to old members anda 


pointer: te our new members -- LGN’ T 
FORGET THE GROUP’S LIBRARY! There 
is a wealth of information and 


Programs availabie far all of our 
computers hiding in our library. 
Magazines, DooKkS, tapes, newsletters 
are gathering dust (and takina up 
space) in our library. This 
treasure is kept at RMG Enterprises, 


1419-i/2 7th St., Gregon City. Drop 
by ard CHECK IT OUT. 

As you may recall, tne Public 
Domain Library project started by 
our neighboring group VISTA, will 
soon become a part of the SNUG PD 


library. Tim Waru will be the T/S 
1000 librarian. They already have 5 
T/S i000 tapes compiled (69 minutes 
each) and are offering them ‘for 
$4.00 a piece. All af the reports I 
Kave néeard about the 1000 tapes have 


been raves. Tim Ward has just 
announced that they have finished 
compiling 2 i/S 2068 tapes (60 


minutes each) and are offering them 
for $4.09 each. Tim Ward will be 
taking orders for either the 1000 or 


2068 tapes tnrough Ferruary 24. 
Make checks payable to Tim Ward and 
send your order to: VYimex/Sinclair 


Public Domain Library, c/o Tim Ward, 
$142-D Ginkgo, Dr. SW., Tacoma, WA 
F3842z9. Tf the 2068 tapes are at all 
like the 1c00 tapes, this is a 
steal. 

The year has only just besun and 
I feel tnat it promises tc be a Very 
Good Year for our group, because we 
have a dedicated pDunch of members! 


Sincilairiy -- Wichael £. Carver 


SECRETARY'S 
SECRETS 


CCATS MEETING OF 1-13-89 


Meeting was called to order by Mike 
Carver at 8:10 PM. The meeting was 
delayed so that we could watch the 
video program that Rod Gowan 
brought. It was from a series that 
shows the progress made in the area 
of storage and retrieval of data. 


Rod Gowan congratulated 
officers. 


the new 


Mike introduced Dave Nielsen to the 
group. Dave has a T/S 100. 


Dick asked if the dinner meeting 
was to be in June or May. After a 
general discussion it was decided 
that there would be a dinner on our 
regular meeting night in May held at 
Norths on McLoughlin Blvd, the time 
to be 7:00 PM. Bob Evans will make 
the reservations. There will be 
about 3@ people at the dinner. 


Mike then asked about having cards 
Printed and distributed to various 
book stores and bulletin boards. 
After a general discussion it was 
decided that Tim would do the art 
work and Rod would give him the 
original CCATS logo to work into 
the cards 


The subject of membership dues was 
brought up again and everyone was 
reminded that they are due by no 
later than March. Come on pay up ! 
Dick mentioned that unless the dues 
are paid you will not receive the 
newsletter. 


After the mention of our having too 
many minor discussions during the 
regular business meetings it was 
decided that we should have a short 
business meeting and then have the 
remaining time for asking for help 
on our pet projects or problems. 

It was agreed that we should adhere 
to Roberts rule of order and then 
moved and seconded to have Rod and 
Dick rewrite the by-laws. This will 
give us all a better chance to be 
heard and perhaps give new members 
a better chance to ask questions, 
and find out how we shere ideas and 
reference materials. 


Betty Schaffler, Secretary 
LARKEN LINES 
MAXCOM!- 


Should be in stock at AMG by the time 
you read this. At $24.95 plus shipping, 
it should be a real bargain for all of 
those wno are using the Larken = system 
and want a 12% bps terminal program. 
For more information, just call or write 
PMG. 
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If you have something you would like to 
see published in this column, FLEAGE, 
let us know! If you have a question 
regarding the operation of your LKDOS 
system, drop me a note. If you have 
found a quick way to do something or 
have a tip for LKDOS users, SEND IT IN! 
We will do our best to research and 
reply to all questions and print the 
replies as space permits. You may even 
find your info incorporated into a new 
Planned book for LEDOS users. We will 
keep you posted on this. 


Nothing else this month. Will try to 
have something worked up for next time. 


See you here later! 


ic fe CARTRIDGE 
BACKUF PROGRAPI 
BY Michael £. Carver: 


The following simple BASIC program 
(which was I think came from a back 
issue of ZX Computing) is a simple 
way to make a Backup copy of a 
micro-cartridge. You must have the 
original in MDV1_ and an already 
formatted cartridge in MBDV2_. 


1000 REMark *k*¥%% cartridge pack 
up copier ***#** 

1010 CLS 

1920 PRINT “This program will co 
Py the entire contents of One ca 
rtridge” 

1030 PRINT “onto another." 

1040 PRINT: PRINT “Place ORIGINA 
Ll cartride in mdvi1l_"\\"Place for 
matted cartride in mdv2_" 

1050 PRINT\\"Press any key to st 
art. .." : 

1060 zS®=INKEYS(-1)°5 CLS 

107C gps=" " 

200C OPEN_NEW #3, mdv2_temp_file 
2010 DIR #3,mdvi_: CLOSE #3 

2020 OPEN_IN #3,mdv2_temp_tile 
2030 INPUT #3,48%5 aS 

2040 PRINT\ “-- COPYING. . . 
\ 
2050 
20640 
p 
2070 
2080 
2090 
“kas 
2100 
2110 
2120 


etn 


REPeat ioop 
IF EGF (#3) THEN EXIT loo 

INPUT #3, a 

PRINT gptkasd 

COFY “mdvil_“kat TO "mdiv2_ 

END R&EPeat loop 

CLOSE #3 

DELETE mdv2_temp_ftile 


-3— 


The above program listing was 
imported into Guitl. Tc format tine 
Ffr:ie to fit within the column width 
of the Plotter If used the following 
BASIC program to save a “text” file 
This file is then imported into 
Quill using Command II Files-Import. 
It is important to choose the import 
by Line option. To use the 
tollowing short program input the 
name of the file to be converted and 
saved (it is important ta include 
the device name, i.@., 
mdvi_ backup _ bas & mdv2_backup_ txt). 
You are then asked to input the 
number. of Characters per cclumn 
(i.@., 32). One last note The 


name you specify fer the text 
versien must not contain more than & 
characters, exclucing the device and 
extention “txt”, or Quill will not 
recognize it as a valid Quill file. 


200 DEFine PROCedure basic2text 


210 INPUT “File name to ne conv 
erted to Text tile ";reads 

220 INPUT "To be save as ";sSave 

$ 

230 INPUT “Number of columns "5 
column 

290 OPEN_IN #7,readd 

259 OPEN_NEW #5, save%S 

260 REPeasat convert 

270 IF EOF (#7) THEN EXIT conv 

ert 

280 INPUT #7, lines 

290 REPeat cut 

3ec IF LEN( lines) >column 

310 PRINT #@,” *s;lines(i TO 
column) 

320 Llines=lines#(column+1 TO 
) 

330 END IF 

340 IF LEN( Lines) <=coiumn 

350 PRINT #8,” “slines 

360 EXIT cut 

370 END IF 

360 END REPeat cut 

390 END REPeat convert 

400 CLOSE #7: CLOSE #38 


4!0 END DEFine basic2text 


BITS & BYTES 
by? ROD GOWEN 


Heard any TS related news lately? 
Did you get any information in the 
mail from other users, user groups, 
or vendors that may be of interest 


to our readers? If so, why not share 
it with us? We need all of the help 


>> > > 


that 


we can get. Please send any 
info that you might have to: Rod 
Gowen, C/O CCAT/S, 1419 1/2 7th 
Street, Oregon City, OR 97045, or 


phone in at: 503/655-7484, NOON = 10 
PM weekdays. I know that the entire 
user group will appreciate it! 


EAST COAST FEST- 


is set for the first weekend in May 
in a suberb of Baltimore, MD. The 
host group is CATS, Capitol Area TS 
users. We are ina position to know 
how they feel and we want to’ extend 
best wishes and good luck in the 
endeavor. We do not want to cast a 
pessimistic pall over the idea of 
the computer fest, but, in our 
opinion, this will more than likely 
be the last of the TS fest/fairs 
that we will see UNLESS this is a 
TERRIFIC success! 


TIME DESIGNS MAGAZINE- 


IS STILL IN BUSINESS! We are 
getting calls and letters 
about the reasons for the fact’ that 
they have not yet received the 
SEP/OCT issue! it seems that even if 
they call TDM, they are getting a 
recorded message that is over 2 
months old and are not getting a 
response to their calls. These folks 
are then calling RMG to check. Tim 
Woods was at our last meeting and 


still 
asking 


assured us that the mag was in the 
mail, but, due to the speed of 4th 
Class book rate, it takes 4-6 weeks 


to get to the East coast and it’ was 
mailed near the 15th of December. 
KEEP THE FAITH! IT WILL ARRIVE! 


REMEMBER WHEN BBS- 


is receiving quite a few 
from the ranks of fTSers. 

rocky start with a local nitwit 
calling up and wiping out the _ hard 
drive a couple of times, additional 


callers 
After a 


security has been added and it now 
seems very secure so we invite you 
to call and make use of the BBS. The 
phone is: 503/652-5803 24hrs, 8/1/N. 
It is an easy one to use. We are 


asking that if you wish to use it on 
a regular basis, send a $10 donation 
to the BBS. Address can be gotten on 
the BBS. 


sik ans TIL 


NEW OFF ICERS- 


have been "installed". We are set 
for another year. Congratulations to 
all of our elected officers: 

MIKE CARVER CHAIRMAN 

MERLUN RAYMOND VICE-CHAIRMAN 

BETTY SCHAFFLER SECRETARY 


RMG ENTERPRISES- 


has received the entire inventory 
from E-Z KEY and if you are 
interested in obtaining a list, just 
send a legal sized SASE and _ they 
will send you a complete list with 
prices of the items that E-Z KEY 
had left. 


CCAT/S DINNER MEETING- 


has been set for the MAY meeting 
night. We will be meeting at Norths 
Chuck Wagon on McLoughlin Blvd. in 
Milwaukie. Time is set for 7:00 PM 
and you are invited to bring your 
spouse. We think that it will be 
kind of nice for a change and it may 
become an annual or even semi-annual 
event. Come and ENJOY! New members 
are invited. Bring a TS friend. 


NEW DTP! - 


for your 2068/Larken with Spectrum 
mode. The new s/w is called 
WORDMASTER and is a word processor 
with 2 add-ons that turn it into a 
full blown DTP package: HEADLINER 
and TYPELINER add fonts, 
columnizing, graphics, and headlines 
to the package. RMG is looking into 
stocking this package. At the moment 
it is available from England. There 
is a sample of what it can do in the 


current issue of 2ZX-APPEAL news- 
letter. 

MS-DOS FOR THE QL- 

will be available at RMG and _ other 
QL dealers VERY soon! You will now 
be able to run all of the public 
domain and shareware software on 
your QL. It comes’ from DIGITAL 
PRECISION and is available in 2 
versions, with and without DOS. For 
pricing and specs, send a SASE 
(legal) to RMG ENTERPRISES, 1419 1/2 


7th STREET, OREGON CITY, OR 97045. 
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» 2068 LARGE Printer Screen Dump 


As many of you will recall, prior to moving from Portland 
in May, I was teaching MC to several CCATS members, at the MC 
SIG. I have not heard but, I hope that SIG did not die with my 
departure. 

The last project we worked on is the topic of this article. 
I had hoped that one the members of the MC SIG would submit and 
explain this program for the Plotter readers. As 6 months have 
elapsed and that has not happened, I felt the rest of the CCATS 
group should have this knowledge, so here it is! 

Briefly, we needed a goal to reach for and a tangible 
program to study. By concensus of the group, we elected to do 
something visual for immediate feedback and a screen dump 
routine was decided upon as no one felt any of the commercial 
programs did an adequate job. 

As presented here, this program is bug-free but needed some 
fine tuning when I left. As I do not know what has happened 
since May, I am presenting the program as we left it in the last 
class. I hope one of the MC SIG members (Jack, Ken, Lynn, Tom? ) 
will follow-up and tell you what refinements were added. 

The following code was written to explain many instructions 
and techniques. It is written assuming that you are using an 
Epson compatible dot-matrix printer and that your printer 
interface is mapped to the standard port, 7Fh. The comments 
should make adjustment for your hardware easy to accomplish. 

The printer set-up codes are stored at labels ESCK and ESCA. 

The technique used is to move each character block of pixel 
data to a buffer for manipulation, as the printer needs to ’see’ 
the data differently. The left-most bit of each pixel row is 
rotated into the Carry flag and then in to A, until all eight 
pixel rows of data, from each character block, are processed. 
Then the processed data is sent to the printer. It was not 
necessary to transfer the data to a buffer however, this made 
the operation easier to understand and demonstrated another 
technique. 

The printer is sent 256 bytes of the 8 pixel row high by 1 
bit wide data which comprises one screen row of 32 character 
blocks, then a carriage return is sent to end the row and do a 
linefeed on the printer. This sequence is repeated until all 24 
rows of the screen have been sent to the printer. 

There is little else that I can tell you about the routine. 
The source is well commented and should prove self-explanatory, 
so have fun and enjoy! 


SCOR ICCICRO ORO ORCC OK ICOROICORCCOOICOOOOOKOK OOK AK KK KK 


xk * 
3 Large Screen Dump for Timex 2068 * 
;* * 
3 written by Syd Wyncoop x 
3k for the CCATS MC SIG * 
3k - 
TLS SeCSSSCCesSSCCeSSSCCSSCSCCSCSSSCSSCoCCSSCSCCCECSCCCCSCCCCC SC CCC CSS CCS SS oe 7 
ORG OFEOOGh ;put at top of memory & below UDG’s 
ENTER CALL GRAFIC ;initialize printer in graphic mode 

LD HL, 4@@@h ;get start address of DFile 

LD B,3 ;initialize counter for # of thirds 
ENTER2 LD C,@ ;initialize counter for # of character 
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PUSH BC 
THIRD LD (STORE),H 


LD DE, BUFFER 
LD B,8 
GETLP LD A, (HL) 
LD (DE),A 
INC H 
INC DE 
DJNZ GETLP 
PUSH BC 
CALL PROCES 
POP BC 
LD HL, (STORE) 
INC HL 
DEC C 
JR NZ, THIRD 
POP BC 
DEC B 
RET Z 
LD DE, 2048-256 


ADD HL, DE 
JR ENTERZ 


STORE DEFW @ 
BUFFER DEFS 8 


;blocks in each third of DFile 

;save the counters on the stack 

;save the DFile character block address 
;in our variable | 

;get start address of data buffer 
;initialize counter for # of pixel rows 
;get and move each byte of pixel data 
;to the data buffer 

;adjust pointers 


;count each pixel row as moved 
;save pointers while we process data 
;and go process it 

;retrieve the pointers 

;retrieve character block address 
;adjust character block pointer 
;count each char block as processed 
;until the third is complete 
;retrieve # of thirds counter 
;count each third as completed 

sand exit when screen is done 

;get # of bytes in each third, less 
;amount already counted 

;adjust character block pointer to 
;point to start of next third 

;and loop to dump next third 


;variable to store character block 
;buffer to manipulate pixel data 


;Process each byte of pixel data from DFile format into dot-matrix 


;printer format. DFile is 
PROCES LD C,8 


PRLP1 LD B,8 
LD HL, BUFFER 
XOR A 
PRLP2 RLC (HL) 
RLA 
INC HL 
DJNZ PRLP2 
CALL PRINT 
DEC C 
JR NZ, PRLP1 
RET 


;Put printer in single density bit-image graphics mode and ready to 
;accept one line of graphic data of length 256. Also, set linefeed 


up/down and printer needs in left/right. 


sinitialize counter for # of 
;manipulations needed 

;initialize counter for # of bytes 
;get start of the data buffer 
;clear any old data and CARRY 
;rotate bit 7 into CARRY 

;rotate A & put CARRY into bit @ of A 
;adjust buffer pointer 

;get bit 7 from each byte 

;send adjusted data to the printer 
;count each manipulation 

;loop until all are done 

;else, return when finished 


;spacing to 7/72" to avoid white space in dump. 


GRAFIC XOR A 
LD (LNCNT),A 
LD HL,ESCK 
LD: B, 7 
GRLOOP LD A, (HL) 
CALL PRINT 
INC HL 
DJNZ GLOOP 
XOR A 
LD (LNCNT),A 
RET 


;clear line counter, temporarily 


;get bit-image graphics mode data 
;initialize counter # of bytes of data 
;get each byte of set-up data 

;and send it to the printer 

;point to next byte of data 

;loop until all have been sent 

;set the line counter to 256 


;printer ready for one line of data 
—-E— 
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;The following table must be customized with the indicated commands 
;for your printer. 


(p> ESCK DEFB 27,’K’ ,@,1 ;Epson single density bit-image graphics 
“ESCA DEFB 27,’A’,7 ;Epson 7/72" linefeeds 


Cy 


Ga 


c™ 


;Send byte in A to printer but, only if the printer is ready and 
;adjust the line counter for each byte sent. Exit via the set-up 
;routine for bit-image graphics mode. 


PRINT PUSH AF ;save data to be printed on stack 
PRTLP1 IN A, (7Fh) ;and check if printer is ready 
CP @EDh 
JR NZ, PRTLP1 ;loop until printer is ready for data 
POP AF ;then retrieve data from the stack 
OUT (7Fh),A ;send data to the printer 
LD A, (LNCNT) ;and count each piece of data sent 
DEC A ;by adjusting our variable 
LD (LNCNT),A 
RET NZ ;return unless end of third is reached 
LD A,@Dh ;else, send carriage return to end the 
OUT (7Fh),A ;line of data and advance paper 
JR GRAFIC ;go set-up for more graphics 
LNCNT DEFB @ ;variable to store number of pixel rows 
;to be sent in each line of DFile 
END 
FROM THE nice number of subscribers. I would 


EBEDITOR'S DESK think that subscribing to a few 
newsletters would be a great help 

This issue of THE PLOTTER has for TS users who do not have access 
several changes decided upon by the to a user group organization. We 
Editorial Staff (that’s me) in the have to give Rad Gowen credit § for 


hopes that the product will be making the subscriptions available. 
improved visually. Since most of the He makes the sale and I keep record 
articles are continued on the’ first of subscription period, address 
column next page when they are toa changes, and mailing out a notice of 
long to be completed on the one end of subscription. Also, an 
page, a set of pointers is being expiration date has been added toa 
used to indicate to turn the page the mailing label like the magazines 
for the remainder. Alsa the dea. 
“continued from page #-"has been 
dropped as superfluocus. I note that I find it interesting to make 
many magazines use this method. It a contact with a new name now and 
also saves adding this paste-on then. I recall one bit of 
note. It also adds one line fear correspondance with a man in the 
text. The practice of providing a South Pacific. Never heard from him 
3/8 inch margin on the left edge for again. I sent him a lot af 
Punching is being continued. UPDATE information, as did Tim Woods. Odd! 
magazine does this and it is handy In contrast, I sent a rather lengthy 
for loose leaf binding. letter to Dottie Bundy in Ventura, 
CA as a kind of “thank you" for 


At mailing time we have a good using a design she had published in 


ee number of paid-up members. In hopes SincWare News. I used it at the 


) 


that non-payment was an oversight, G.N.W.C.F. in explaining the 
a February issue is being sent toa procedure for doing printer graphics 
the few have become delinquent in in contrast with a screen dump. I 


Payment. We are alsa maintaining a have received a nice reply--seems 
ty ae >> >> > 


BSSSSSSSSSSSSSSSssSsSss Sess ssssssessseess 


she does some very nice screen dump 
Qraphics. This alsa put her in 
contact with RMG Enterprises with an 


inquiry about some supplies. I hope 
we can entice Dottie ta send us a 
Program to use as we see few such 
programs now. 

One problem with screen dumps 
is the inability ta eliminate 
printer non-linear displays Cat 
least I don’t know how). Make a test 
with a large square on the screen 
and then dump it ta the printer. Now 
measure adjacent sides and see if 
your large printer produces a 
symetrical image. If it does then 
circles will not come out as oavals. 


Of course you can use 
for line drawings but 
well when inputting hundreds of 
points in a graphics program. Does 
anyone have a suggestion for setting 
up the printer for graphics that 
permits averriding the screen dump 
pragram? I tried entering the 
printer codes in direct mode ta 
change the printed width but it 
didn’t take. 


a fudge factor 
you can't very 
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CCAT/sS 
1419 1/2 7TH Street 
Oregon city, OR 97045 


—-NOT Ii Cce— 


Opinions expressed in articles 
not necessarily those of 
the Clackamas County Area 


are 
members of 
T/S User 


Group. Meeting minutes carry the 
concensus of members present at 
meetings. This newsletter nor staff 


will be held liable for any damage or 
consequences due to following 
instructions, or review of products 
as contained in this newsletter. 


SUBSCRIPTION RATE 
FREE SUBSCRIPTION WITH PAID 
CCAT/S MEMBERSHTIP-%20.00/YR 


AD RATES 
REN 
2 FOUR LINE CLASSIFIED FREE 
WITH MEMBERSHIP 
PAGE 
1/4 PAGE 
2/2 PAGE 
FULL PAGE 


# 8.00 / 
$15.00 / 


ALL AD COPY MUST BE IN BY THE 
10 TH OF THE MONTH PRIOR TO 
THE MONTH AD IS TO RUN. 
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